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editor's letter 


Paper airplanes are no longer just the simple fold 'em up 
type that I remember as a school girl -- they're a science. 
Our cover features The Great International Paper Airplane Book 
by J. Mander, G. Dippel, and H. Gossage published by Simon & 
Schuster in 1967 following the First International Paper 
Airplane Competition sponsored by Scientific American, and The 
Enterprise, Columbia Space Shuttles to Color, Cut Out and Fly! 
by Richard Wagner, published by Price, Stern, & Sloan, 1979. 


If you are wondering about my newly acquired fascination 
with paper airplanes, see our cover story on the Huntsville 
User Group, page 6. The Huntsville Group is comprised of 
individuals singularly attracted to airborne things. 


Announcing plans for the First Compucolor/Intecolor 
International User Group Convention. The Georgia Compucolor 
User Group iS sponsoring the first combined user group 
convention to be held here in Atlanta, July 18 through 20. The 
fee for all three days is just $50. The convention site is the 
Perimeter North Inn. 


The Convention will feature a Plant Tour and seminars on 
all your favorite topics: color graphics, file handling, 
interfacing, basic BASIC, and Assembly. And who knows what 
else could be in store at the First Users Convention? I have 
enclosed a pre-registration form in this issue. If you are 
interested in attending, it is very important that you fill out 
that form and get it back to me no later than July 7th so that 
I can block off enough space at the hotel to accomodate you. 
When I receive your pre-registration form, I will send you a 
complete packet of convention and hotel information. 


Make plans now to meet your fellow users and join the fun! 


I'll see you there. 


rem 


Here's an article by Tom Hudson of Springfield, MO. Tom EDITOR'S NOTE 
is interested in contacting any Compucolor users in his area 
for information exchange. 


This program demonstrates a routine that allows a user to SCREEN SAVER 
move characters around on the Compucolor screen without By Tom Hudson 
destroying the information already resident on the screen. It 2369 E. Seminole 


will work with any color or character, even graphics. Springfield, MO. 65804 
(417) 883-0727 
The routine works by coding the X and Y cursor positions or 493-8222 3 
into a memory address and moving the contents to FI (Foreground 


EDITOR'S NOTE 


Info) and BI (Background Info). FI contains the ASCII value of 
the foreground character. BI contains the color information 
for the screen position. After these values are saved, the 
routine is able to print the desired character at the desired 
location (in this case , PX and PY). The routine delays for a 
short time, and then restores the old screen contents by 
POKEing FI and BI back into screen memory. 


I needed this routine for a war game I am writing. The > 
program draws an intricate world map, and attack satellites are 
moved around the screen. Without this routine, the satellites 
would quickly destroy the map, and I'd have real trouble. By 
using this routine, I can move the satellites without messing 
up the graphic display. 


One operating note: This routine will NOT work if the 
screen has been scrolled. To avoid this, I use an ERASE PAGE, 
followed by an (ESC)X (which sets up the PAGE mode, and 
prevents the screen from scrolling up). Normally, you will 
only be using this routine on nomscrolling displays, so you 
should have no problem. 


(Another solution would be to add PLOT 27,88:LOAD, name of 
program:RUN in the program.) 


To use the routine, clear the screen and put any type of 
display on it (make sure the screen has not scrolled!). A good 
display to use for this is the High Resolution 3-D Blocks 
display from the graphics issue of COLORCUE (Vol. 3, #2, Feb. 
1980). After the display is on the screen, load this program 
and RUN it. A red asterisk will move itself around the screen, 
and the display won't be damaged. 


To adapt this technique to one of your programs, use lines 
40, 70 and 100. BEFORE printing the character, move the X and 
Y coordinates to the PX and PY variables and execute AD = FN 
AD(0). Next, store FI and BI as in the routine line# 70. Now 
you are ready to print the character. When you are ready to 
restore the old screen contents, use the coding in line# 100. 
It's aS easy as that! 


By using this routine in certain games, you can make 


displays as complicated as you like, without worrying about 
ruining them. 


If anyone has any questions or comments, please feel free 
to call or write. 


LINE# FUNCTION 


10 This line sets up the initial values of 
PX and PY, the screen X and Y locations 
of the character to be moved around. It 
also sets up the XI and YI variables. 
These are used to increment the PX and 
PY values so the character will move. 


20 This line sets up the address function 
that finds the address of the screen 
position indicated by PX and PY. 


40 This line increments PX and PY to the 
next screen position. 


50-60 These lines check to see if the PX and 
PY values have gone beyond the acceptable 
ranges. If so, the increments are 
negated. 


70 This line finds the memory location for 
the current position of the character. 
Using this information, the program 
retrieves the information about the 
character currently on the screen and 
stores them in the FI and BI variables. 
BI holds the color status information. 
FI holds the ASCII character value. 


80 Now that the old information is stored, 
it is O.K. to print your character. 
This line plots an asterisk using the 
blind cursor mode. Any other character 
could be plotted in this manner. 


90 This line is a simple time-delay loop, 
SO you can see the asterisk. 


100 This line restores the old information 
into the screen memory. It merely POKEs 
the original FI and BI values back into their 
respective locations. 


110 Now the program goes back to line 40, so 
it can advance the asterisk to the next 
position. 

LIST 


1 REM THIS ROUTINE ALLOWS A PROGRAM TO MOVE A CHARACTER 

2 REM AROUND ON THE SCREEN WITHOUT DESTROYING THE INFO 

3 REM ALREADY ON THE SCREEN. 

4 REM 

10 PX= 32:PY= 16:XI= 1:YI= 1:REM SET UP X&Y VALUES, INCREMENTS 
20 DEF FN AD(A)= 28672+ PX* 2+ PY* 128 

30 REM ADDRESS FIND FUNCTION 

40 PX= PX+ XI:PY= PY+ YI:REM INCREMENT X & Y TO NEXT POSITION 
50 IF PX< OOR PX> 63THEN XI= —XI:PX= PX+ XI 

60 IF PY< OOR PY> 31THEN YI= - YI:PY= PY+ YI 

70 AD= FN AD(0):FI= PEEK (AD) :BI= PEEK (AD+ 1) 

71 REM GET FOREGROUND AND BACKGROUND INFORMATION 

80 PLOT 3,127,PX,PY,1,42:REM PLOT AN '*' IN BLIND CURSOR MODE 
90 FOR l© 1TO 50:NEXT :REM DELAY A BIT 

100 POKE AD,FI:POKE AD+1,BI:REM RESTORE OLD SCREEN CONTENTS 
110 GOTO 40:REM NEXT POSITION 

READY 


Steering the conversation over to things which 
are not airborne is impossible with this group. 
As we get ready to take formal shots of the 
Group (which somehow never work out!) Wubbo 
clowns, giving a semi-serious lecture of the, 
no doubt, superior abilities of his paper 
airplane! 


From left to right, they are Stephan Bernhardt, 
Dick Heckman, Jim Perkins, Tony O'Neil, Wubbo 
Ockles, Eike Mueller, Jim Horwitz, Jim Green, 
Chuck Lewis, and Jeff Riggs. 


A VISIT 
HUNTSVILLE'S 


One of Compucolor's most unique groups has formed in 
Huntsville, Alabama, nestled between the foothills of the 
Appalachian mountains and the Redstone rockets. 


The Huntsville User Group is entirely made up of NASA and 
ESA (the European Space Agency) Compucolor users, all working 
on the Space Lab project. It'S a group with a distinct 
international flavor, using their machines for a wide variety 
of ordinary and not-so-ordinary activities. Like the rest of 
us, there's a wide variety of levels of expertise from just 
beginning to quite advanced. However, the homogeneity of their 
work relationships makes this group quite a contrast from most 
of the other groups I've seen. 


The Group collected bright and early on April 26th at the 
home of the Group's President, Eike Mueller. First on the 
agenda was a demonstration of displays given by Wubbo Ockles. 
Dr. Ockles is a physicist by trade and a Payload Specialist by 
occupation. A Payload Specialist is what we used to call, ina 
more romantic age, an astronaut. Space Lab's Payload Specialists, 
2 Americans and 3 Europeans, will be 
conducting a wide variety of scientific 
experiments while the lab is in orbit. 


} 


Wubbo and his two European 
counterparts are uSing their recently | 
purchased CCII to simulate the 
experiment displays that they will be 

uSing on the mission. These displays 
‘ replicate the on-board computer displays 
that they will actually be using. They 
are sending the displays back and forth 
. to each other for training. 


Eike, the NASA/ESA Liaison, 
demonstrates a project scheduling 
program which marks General Milestones 


Onto serious matters, Wubbo demonstrates his 
Space Lab experiment simulation displays to the 
great interest of the Group. 


for American and European activities. Tony O'Neil, head of Photos 
Ground Operations, is particularly interested in this one -- by Dennis Keim 


just like everywhere else, apparently scheduled completion 
dates change frequently. 


Eike formats this information with his Vu-Graph program, 
prints it out on his Paper Tiger printer, and uses the output 


to make transparencies for the inevitable Monday Morning 

Meeting. (By the way, these 

pregrans-“are- “pretty 

WLTH generalized and could be 

converted ior .most 

environments. Contact Eike if 

COMPUNAI i bo you are interested.) Eike can 

even plot a graph with the 

Original projected dates, new projected dates, and final 

completion dates to help plan more realistic target dates in the 

future. On the personal side, he has developed a program to 
arrange and rearrange the floor plan of his home or office. 

Several hours after the meeting began, the Group drifted 

home only to regroup at Eike's that evening for an incredible 

German-style barbecue. "A good time had by all" sounds hollow 


compared to the experience! Call or visit, it's worth the trip. 


Now that I have friends in high places, maybe I'll get to write 
a future issue of COLORCUE from space? 


Later, Eike demonstrates 
the SOURCE network. The 
user meeting was held on 
the day after the aborted 
hostage rescue attempt, 
SO we were all quite 
interested in the UPI 
news bulletins. That's 
your Editor holding up 
the doorway there! 


MORE GROUPS} 


NEW USER GROUP 
FORMING IN 
MASS./CONN. 
AREA 


CANADIAN 
USER GROUP 


EL CERRITO 
USER GROUP 


AND TWO 

NEW 
AUSTRALIAN 
USER GROUPS 


user group hotline 


A new group is forming in the south Massachusetts -- 
Connecticut area. For further information contact: 


Richard Manazir 

13 Grandview Street 

Southwick, Mass. 01077 

Phone: (Day) (203) 688-1911 x4716 
(Night) (413) 569-6621 


The Canadian User Group meets once every 2 months on the 
last Tuesday of the month at different locations near 
metropolitan Toronto. Fees are $15.00 per year which includes 
a newsletter (still un-named). There are currently about 55 
members. 


CANADIAN USER GROUP 

Contact: Glen Davis, President 
Bsmt-59 Kendal Avenue 

Toronto, Ontario 

Canada, M5R 1L8 


A small but growing group according to Fred Pezok. They 
have amassed a sizeable list of software in their user group 
file, including control software for the I.D.S. 225 and BASE2 
printers, for $15 each. Membership dues will be $10 plus the 
submission of one program after August lst. Meetings are held 
on the 3rd or 4th Tuesday of the month at P.C. Computers. 


THE EL CERRITO COMPUCOLOR II USERS GROUP 
Contact: Fred Pezok or Frasier Hewitt 
c/o P.C. Computers 

10166 San Pablo Avenue 

El Cerrito, California 94530 

(415) 527-6657 


Both of these groups are anxious to contact other user 
groups, particularly in the area of program exchange, 
techniques, and applications. 


IN THE SYDNEY AREA: 
Contact: Andrew McIntosh 
91 Regent Street 
Chippendale, N.S.W., 2008 
Australia 


IN THE MELBOURNE AREA: 
Contact: Neil Brandie 
212 High Street 
Windsor, Victoria, 3181 
Australia 


Brian Cruse has just put out his first issue of the OTHER NEWS 


Australian COLORCUE in April. The subscription rate is $l per 
issue. For further information contact: 


Brian Cruse 
8 Ulva Street 


Bald Hills, Queensland 4036 
Australia 


_ CK ping it simple 


How many of you out there have ever wondered how 
Compucolor builds their disk directories? Fortunately for us, 
the Compucolor's disk directory is set up so that it contains 
everything you need to know about a disk file. Let's take a 
closer look at how it is constructed. 


As most of you know, the CCII allows you 400 (190H) blocks 
of disk space, with each block containing 128 bytes. When a 
disk is initialized, a specific portion of the disk is 
allocated to directory space. This is done by using the 
following command: | 


FCS>INI CD0:SAMPLEDISK XXXX 


where XXXX is the number of directory blocks you want allocated 
in hex. Remember, this is a hex number, so if you wanted 10 
blocks for the directory, you would enter 0A not 10. The CCII 
will allocate up to 20H blocks for the directory. If you used 
20H, then you would have a maximum number of entries equal to 
190! Since it would be very difficult to read a directory with 


that many programs on it, we usually use a much smaller number 
such as 06 to allow only 34 entries. 


Here is a breakdown of what is on each block: 


BLOCK 0 
BYTE CONTENTS 
0 Current Block 
1 Maximum number of directory blocks 
2 Volume entry attribute (=41H) 
3-12 Volume name (ASCIT) 
13-22 Reserved 
{te File attribute 
24-29 File name (ASCII) 
30-32 File type (ASCIT) 
33 Version number in hex 
34 Low order byte of starting block 
35 High order byte of starting block 
36 Low order byte of size 
37 High order byte of size 


“DOWN UNDER" 
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38 Last block count 
39 Low order byte of loading address 
40 High order byte of loading address 
4] Low order byte of starting address 
42 High order byte of starting address 
43 Reserved 
44-64 Same as 23-43 above 
65-85 Same as 23-43 above 
86-106 Same as. 23-43 above 
107-127 Same as 23-43 above 
BLOCKS 1 THROUGH XX 
BYTE CONTENTS 
0 Current block 
1 Maximum number of directory blocks 
2-22 Same as 23-43 on Block 0 
23-43 Same as 23-43 on Block 0 
44-64 Same as 23-43 on Block 0 
65-85 Same as 23-43 on Block 0 
86-106 Same as 23-43 on Block 0 
107-127 Same as 23-43 on Block 0 


All entries in the Directory (except the first and last) 
are structured identically. The first entry contains the disk 
name, and the last entry contains the free space entry. That 
is why the formula for finding the number of entries allowed 
iss XX * 6 - 2. 


It is very important to remember that when altering 
anything in the Directory, you have to alter it a block at a 
time. This means that if all you want to change is the 10 
character disk name, you must read in the entire 128 bytes of 
block 0, or you can ruin a disk. 


By means of a utility program, it is also possible to 
alter the attribute byte, program name, file type, version, and 
even the loading address of any file. It is also possible to 
create a protected file that cannot be deleted from the disk. 


A final word of caution. Use extreme care whenever 
attempting to change anything on the disk with the WRITE 
command. Severe and often irreparable damage can be done to a 
disk through careless use of this command. For those of you 
that want to experiment, try using a blank disk. It could save 
you a lot of headaches. 


The following program allows you to convert from decimal, 
hexadecimal, octal or binary into the other bases. The number 
to be converted is entered as a string, converted to a positive 
integer and then all of the results are calculated. This 
allows quick verification of the algorithm. The program should 


be self-explanatory. 


10 REM ***** NUMERIC BASE CONVERSION PROGRAM ***** 
15 REM 


20 REM ** WRITTEN BY: 


WIZARD #6 


25 REM ** TECHNICAL ADVISORS: WIZARDS #1, #3, AND #7 
30 REM 


35 REM ** LAST REVISED: 


MAY 18, 1980 WIZ #6 


40 REM 

45 REM 

50 CLEAR 1000 

100 CC$= "0123456789ABCDEF" 

200 PLOT 6,3 : PRINT : INPUT "BASE (D,H,O,B) = ";NBS 
205 PLOT 6,2 

210 IF NBS= "D" THEN GOTO 2000 

220 IF NBS= "H" THEN GOTO 3000 

230 IF NBS= "0" THEN GOTO 4000 

240 IF NBS= "B" THEN GOTO 5000 

250 GOTO 200 

260 REM 

2000 REM ** DECIMAL ** 

2005 NB= 10 , 

2010 PRINT : INPUT "DECIMAL NUMBER = ";DS$ 
2020 IF DS$= "" THEN GOTO 200 


2030 
2040 
2050 
2060 


IF LEN (DS)> 5 THEN GOTO 2010 
SD$= D$ 

GOSUB 6000 

IF SDS="" THEN GOTO 2010 


2070 GOSUB 7000 : REM CALCULATE STRINGS 
2080 GOSUB 8000 : REM _ PRINT STRINGS 

2090 GOTO 2010 

2095 REM 

3000 REM ** HEXADECIMAL ** 

3005 NB= 16 

3010 PRINT : INPUT "HEXADECIMAL NUMBER = ";HS 
3020 IF HS= "" THEN GOTO 200 


3030 
3040 
3050 
3060 


IF LEN (H$)> 4 THEN GOTO 2010 
SDS= H$ 

GOSUB 6000 

IF SDS= "" THEN GOTO 3010 


3070 GOSUB 7000 : REM CALCULATE STRINGS 
3080 GOSUB 8000 : REM PRINT STRINGS 
3090 GOTO 3010 

3095 REM 

4000 REM ** OCTAL ** 

4005 NB= 8 

4010 PRINT : INPUT "OCTAL NUMBER = ";0$ 
4020 IF OS="" THEN GOTO 200 


4030 
4040 
4050 
4060 
4070 


IF LEN (OS)> 6 THEN GOTO 4010 
SDS$= OS 

GOSUB 6000 

IF sSps= "" THEN GoTo 4010 

GOSUB 7000 : REM CALCULATE STRINGS 


4080 
4090 
4095 
5000 
5005 
5010 
5020 
5030 
5040 
5050 
5060 
5070 
5080 
5090 
5095 
6000 
6020 
6025 
6030 
6040 
6050 
6060 
6070 
6080 
6083 
6085 
6090 
6095 
6100 
6110 
6115 
6120 
6130 
7000 
7010 
7020 
7030 
7040 
7050 
7060 
7070 
7080 
7090 
7095 
8000 
8010 
8020 
8030 
9000 
9010 
9020 
9030 
9040 
9050 
9060 
9070 


GOSUB 8000 : REM PRINT STRINGS 
GOTO 4010 

REM 

REM %** BINARY ** 

NB= 2 

PRINT : INPUT "BINARY NUMBER = ";BS 


IF BS="" THEN GOTO 200 


IF LEN (BS)> 16 THEN GOTO 5010 
SDS= BS 
GOSUB 6000 


GOSUB 8000 : REM PRINT STRINGS 

GOTO 5010 

REM 

REM ** CONVERT FROM A STRING TO A POSITIVE INTEGER ** 
SL= LEN (SDS) 

X= 0 

FOR I= OTO SI- 1 


SC$= MID$ (SD$,SL- I,1) 
FOR J=1 TO 16 


IF SC$= MIDS (CCS,J,1) AND J< = NB THEN GOTO 6100 


NEXT J 


PRINT : PRINT "*** INVALID CHARACTER '";SC$;"! *#x" 


PRINT « 
SDS= "" ; REM FLAG ERROR 


X= X+ (( 1)* (NB I)) 

NEXT I 

X= INT (X+ .5) : REM CONVERT TO INTEGER 
RETURN 


REM 

REM ** CALCULATE STRINGS FOR DIFFERENT BASES ** 
BB= 10 : XX= X : GOSUB 9000 

DDS= NSS 

BB= 16 : XX= X : GOSUB 9000 
HHS= NSS 

BB= 8 : = X : GOSUB 9000 
oos= NSS 

BB= 2 : = X : GOSUB 9000 

BBS= NSS 

RETURN 

REM 

REM ** PRINT THE CONVERSIONS ** 


PRINT "DEC = ";DD$,"HEX = ";HHS,"OCT = ";00$,"BIN = ";BB$ 
RETURN 

REM 

REM ** CONVERT TO DESIRED BASE ** ° 

NSS= wi 

XQ= INT (XX/ BB) :XR= XX- (BB* XQ) 

XX= XQ 

NS$= MID$ (CC$,XR+ 1,1)+ NS$ 

IF XX< > 0 THEN GOTO 9020 

RETURN 


REM 


Glen Hayhurst, has sent in a hexadecimal to decimal 
conversion program for a programmable calculator, the HP 33E. 
He will be happy to provide it to you if you are interested; Glen Hayhurst 
please send a self-addressed stamped envelope with your 9595 Pecos "14 
request. Denver, Colorado 80221 


advanced applications 


It is often useful to be able to execute FCS commands from 
an assembly language program. This is provided for in the 
system software and very easy to implement. A simple example 
of this would be to have one program call another for a special 
function or task and then return to the original progran. EXECUTING 


FCS COMMANDS 


There are three routines that are used and they are FCS, 2 ee 


EMESS, and FCSEM. FCS is the Command Interpreter and it is 
used by pointing H&L to the command line to be executed and 
then calling FCS. The command line must end with a null byte 
(00). The FCS routine first searches the Command Table for the 
command and if it is found, the command is executed. If the 
command is not found or if there is some other error, the 
routine returns with the error code in the B register and the 
<Z> flag cleared; otherwise B equals 00 and the <Z> flag is 
set. 


The EMESS routine can then be called, with or without an 
error. If an error is present, it will be listed to the output 
device using the OSTR routine (which we discussed in the 
September/October issue). The error conditions will be 
preserved through EMESS. If you wish to use FCS and EMESS 
regardless of an error, call FCSEM with H&L pointing to the 
command line. 


One of the powerful features of the routine FCS is that if 
it is called, it will return to the calling program upon 
completion. This is useful if a test program is very large and 
can't fit into the allowed memory at one time. A main routine 
can be written to call particular routines as they are needed 
to perform desired tests. When a particular test executes to 
completion, control is returned to the main routine which, in 
turn, can call another routine located in the same area as the 
one just completed. NOTE: The main program must not be 
overwritten by a called program if the called program is to 
return to the main by simply executing a return (RET). The 
main program might reside from 8200H to 83FFH and the called 13 
routine(s) be setup to load at 8400H or higher. 
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Another way to use the FCS routine is to chain programs 
together. Suppose you designed an assembler to work with a 
linker. Upon completion of the assembly, the assembler would 
execute the linker by pointing to the ‘RUN LINKER' command line 
and then jump ('JMP') to the routine FCS. The linker would 
execute at this point. If the linker returns when it is 
finished, control then passes to the caller of the assembler. 


Take care to preserve the stack pointer and the stack when 
writing a program that will return to its caller. The program 
cannot be entered through the user vector, ECS ~, because the 
proper return address is not placed on the stack. An example 
would be all of the Basic Utilities (except for Fredi) which 


were designed to be re-entered through an Escape Vector (ECS 
xx) and always to return to the File Control Systen. 


This sample program illustrates the use of the routines 
but is not designed to perform a specific useful task. 


*kk** V6.78 SYSTEM SOFTWARE ***** 


ee 
aa 


FCS EQU 25ECH ; FCS COMMAND INTERPRETER 
EMESS EQU 262DH ; FCS ERROR MESSAGE PROCESSOR 
FCSEM EQU 262AH ; COMBINATION OF FCS AND EMESS 


*kkk* 8.79 SYSTEM SOFTWARE ***** 


=e 
cme 


FCS EQU 0A95H 
EMESS EQU OAD6H 
FCSEM EQU OAD3H 
ORG OFFOOH ; LOCATE AT TOP OF MEMORY 
TEST: 
LXI H,CMNDO2 ; COMMAND LINE FOR FCS 
CALL FCS : RETURN TO HERE WHEN FINISHED 
CALL EMESS ; PRINT ERROR IF ANY (B<>0) 
TEST2: 
LXI H,CMND04 
CALL FCS 
LXI H,CMND06 
CALL FCS ; DON'T PRINT ERROR MESSAGE 
JNZ TEST * IF ERROR RE-EXECUTE PROGRAM 
TEST4: 
LXI H;CMNDO8 
JMP FCSEM ; RETURN TO CALLER OF 'TEST' 
CMNDO2:  # DB "DIR CD0:',0 
CMNDO4:  # DB "DEV CDO:',0 
CMNDO6: DB "COP SCRATC.RND TO CD1:',0 
CMNDO8: # DB "RUN MEMORY .PRG' ,0 
END TEST 


Our old friend, Bill Greene, has submitted the following IBM 
driver program for use on the IBM USC 1035 I/O terminal. This BIT—BANGING 
terminal uses the standard RS-232 outlet. DRIVER 
>ASM IBMOUT By Bill Greene 
: IBM BIT-BANGING DRIVER RT3 Box 00-200 
: 3/24/80 BILL GREENE Byron, Ga. 31008 
; START IS CALLED WITH IBM CODE IN REGISTER C 

8200 (BFOO) ORG OBFOOH ;OUT OF THE WAY IN HIGH MEMORY 

BFOO 79 START: MOV A,C ; PXXXXXX0 TO ACC P=PARITY O=START BIT 

*XXXXXX = IBM EBCD CODE 6-LEVEL 

BFO1 E5 PRINT: PUSH H +SAVE SHIFT STATUS AND LINE COUNT 

BFO2 2609 MVI H,9 sBIT COUNTER-OUTPUT WILL BE 1 PXXXXXxX0 

BFO4 47 OUTBIT: MOV B,A sSAVE THE BITS FOR LATER 

BFO5 2F CMA ;NEED THE COMPLEMENT FOR IBM 

BFO6 E601 ANI 1 *MASK AO ONLY, LEAST SIGNIFICANT BIT 

BFO8 07 RLC Be: 

BFO9 C608 ADI 8 ; +8 

BFOB D304 OUT 4 ;MARK(8) OR SPACE(10) FOR RS232C 

BFOD 110002 LXI D,512  ;LOAD LOOP COUNTER 

BF10 CD1LCBF CALL LOOP ;FOR 7.43MS DELAY 

BF13 78 MOV A,B sGET REMAINING BITS 

BF14 37 STC ;SET CARRY FOR STOP BIT(1) 

BF15 1F RAR ¢ 1 PXXXXXX, 11 PXXXXX, 111 PXXXX, ETC. 

BF16 25 DCR H ;COUNT THE BIT 

BF17 C204BF JNZ OUTBIT ;GET ANOTHER ONE 

BFIA El POP H ;RESTORE STATUS 

BF1B C9 RET :GO HOME 

BF1C 1B LOOP: DCX D ;DECREMENT D,E REGISTER 

BF1D 7A MOV A,D sLOOK AT D 

BF1E FEFF CPI 255 ;LOOKING FOR 65535, ESSENTIALLY -1 

BF20 C21CBF JNZ LOOP sWASTE MORE TIME 

BF23 C9 RET 

BF24 7534B4F5 TABLE: DB 75H,34H,0B4H,OF5H ;IBM CODE 

BF28 68C35864 DB 68H,0C3H,58H,64H  ;FROM ASCII 33 TO ASCII 96 

BF2C 540443F6 DB 54H ,04H ,43H, OF6H 

BF30 81B/7E2D4 DB 81H,0B7H,0E2H,0D4H 

BF34 AO90F088 DB OAOH ,90H,OFOH,88H 

BF38 E8D8B884 DB OE8H,0D8H,0B8H,84H 

BF3C E4087010 DB 0OE4H,08H,70H,10H 

BF40 20386282 DB 20H, 38H,62H, 82H 

BF44 2313730B DB 23H, 13H,73H,0BH 

BF48 6B5B3B07 DB 6BH,5BH,3BH,07H 

BF4C 67615131 DB 67H,61H,51H,31H 

BF50 49291979 DB 49H,29H,19H,79H 
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BF54 45255232 DB 45H ,25H ,52H,32H 


BF58 4A2Al1A7A DB 4AH,2AH,1AH,7AH 

BF5C 462676E2 DB 46H,26H,76H,0E2H 

BF60 76370102 DB 76H,37H,01H,02H 

BF64 803C STATUS:DB 128,60 ;SHIFT FLAG AND LINE COUNT 
BF66 (BFOO) END START 

SYMBOL TABLE 


LOOP...eBF1C OUTBIT..BF04 PRINT...BFO1 START...BFO0O STATUS. .BF64 
TABLE. . .BF24 


nuts & bolts 


Electrical noise is a major problem in microcomputers. 
Generated within a computer itself, it can in many cases 
interfere with nearby radio and TV reception and 
even with the computer's own operation. Many — 
unexplained microcomputer malfunctions can, in “\, 
fact, be traced to the external noise. All Cy 
microcomputers are more prone to electrical RY 
noise problems than large mainframe computers. 

Let us explore one source of noise and its ()) 
effect on microcomputer operations and suggest () 
methods of reducing or eliminating the problem. 


Nearby lightning strikes generate spikes of the highest 
amplitude, but strikes a mile or more away can also cause 
trouble. This noise appears on an oscilloscope as a rapid-fire 
series of narrow, high voltage spikes. It can enter the power 
system either from a direct strike on power distribution 
equipment or by induction. Since power lines may be strung 
overhead for long distances, they efficiently pick up 
electrostatic and electromagnetic fields radiated by lightning 
strikes and conduct the resulting spikes into your home. 


Probably the power line noise with the next highest 
amplitude is created by switching off an inductive appliance, 
allowing energy stored in the magnetic field of an inductive 
device to release suddenly as the field collapses. For a few 
dozen microseconds, a very high voltage is built up and may arc 
across the open switch contacts, feeding a high voltage pulse 
with a fast rise time into the power line. AC induction motors 
and transformers -- even those in fluorescent lamp fixtures -- 
are the most highly inductive. Large motors, such as those 


used in refrigerators and air conditioners, create an 
electrical noise even when they switch on because an internal 
starting winding switches off when they reach operating speed. 
Industrial plants with hundreds of very large motors and 
transformers constantly switching on and off present 
particularly hostile electrical environments for computers. 


While these sources are responsible for occasional high 
amplitude spikes on the power line, universal motors (those 
with brushes) and lamp dimmers generate lower amplitude, but 
more continuous noise. The obvious source of noise in 
universal motors originates with armature brushes that 
constantly spark during motor operation. Lamp dimmers with 
silicon-controlled rectifiers (SCRS) or triacs generate a small 
amount of noise on every alternation of the AC line because of 
the rapid turn-on characteristics of these semiconductors. 


One might reasonably ask how power line noise can get into 
a computer's logic circuitry if its very narrow pulse widths 
cannot pass through the power transformer and rectifier diodes 
to actually change the DC supply voltages (large power-supply 
filter capacitors prevent this). Noise is capacitively coupled 
from the power supply's primary wiring directly into the 
regulated DC output wiring and then into the logic. In some 
computers with the primary wiring routed close to the logic 
circuitry, noise bypasses the power supply altogether and 
couples directly into the logic. It is not difficult to 
visualize how even a fraction of a picofarad of coupling 
Capacitance can transfer more than 1 volt (the typical 
noise-immunity specification for most TIL and MOS logic) of the 
Original 1000-volt spike into the logic circuitry and possibly 
cause an error. NOTE: Most computers are sensitive to noise 
only during part of their BUS and memory cycles; hence, it is 
eee for the computer to ignore the majority of noise 
spikes. 


Preventing power line noise from entering a 
Cy computer is relatively easy -- simply use a noise 
rr «\ filter between the AC outlet and the computer's 
‘YY line cord. Filters are most effective if located 
inside the computer's cabinet, right at the point 

where the power cord enters. Even if installed at 
the plug end of the computer's line cord, however, they can be 

very helpful in excluding power line noise. 


While filters are available from a number of 


sources, you might want to make your own filter wg 
circuit. A good power line filter consists oe Cy 
basically of two L-section low-pass R-F filters \ 


(to provide both common and transverse mode noise 0) 
rejection), with inductors designed to handle «\ 
several amperes of continuous current. Metal- 


oxide varistors (MOVS) are included to prevent possible damage 
from direct local lightning strikes but do not otherwise 
contribute to filtering out noise. (MOVS act like high-power 
zener diodes, shorting out electrical spikes that exceed about 


300-volts in amplitude.) 


17 


18 


THE COMPUCOLOR 
MONITOR 


A properly grounded three-wire AC outlet and computer line 
cord are required for any noise filter to function properly. 
With non-grounded outlets, filtering efficiency will be very 
low and current leakage through the filter's capacitors could 
create a mild shock hazard. 


AC-line filters cannot cope with problems caused by 
low-frequency power surges and dips long enough in duration to 
affect the computer's DC voltages. The only defense against 
this type of noise is a wide line-voltage range camputer power 
Supply or an expensive external AC voltage regulator. 


product showcase 


The Compucolor Monitor disk is used to display and alter 
the memory contents of the Compucolor II. Commands are 
available providing access to memory in several ways and the 
command syntax is really quite simple. A command is one 
character followed by one or more parameters separated by 
Spaces. There are no spaces immediately after the command 
character itself. The form looks like this: 


eCXXxXX YYYY ZZ 
C is the command, xxxx is the first parameter, yyyy is the 


second parameter, and zz is the third (the maximum number of 
parameters allowed). All parameters are in hexadecimal format. 


List of the available commands and their formats: 
A -- Display memory contents in ASCII. .Assss eeee 
D -- Display memory contents in hex. eDssss eeee 


E -- Exit program, return to CRI mode. .E 


F -— Fill memory with a constant. eFssss eeee cc 
G -- Go to memory location with 
optional breakpoints. eGssss bbbb 
M -—-— Move memory. eMssss eeee dddd 


S -- Substitute memory contents. eSSSSS 


There are three programs included on the MONITOR disk, two 
LDA-type files called MONT.LOW and MONT.HGH. The two MONT 
files are assembled at OH and 100H. The disk also includes a 
MENU program which creates a MONT.PRG program at any RAM memory 
location you desire. MENU compares the two files and can be 
used to relocate any assembly language program having identical 
LDA versions assembled at OH (LOW) and 100H (HGH). It does not 
have a DS as its last statement. 


The MONITOR disk is now available from your Compucolor 
dealer or from the factory for $19.95. 


As a service to our readers, Compucolor Corporation EDITOR'S NOTE 
publishes information sent to us by other manufacturers of 
products, techniques, or scientific and technological 
developments which can be used in conjunction with the 
Compucolor computer. However, in many cases, Compucolor 
Corporation has not had the opportunity to examine or test 
these products thoroughly. Therefore, we neither endorse nor 
assume any responsibility of liability for the proper 
functioning of products not directly manufacturered by the 
Compucolor Corporation. We hope you will find these products 
of interest, but we encourage you to investigate carefully 
before you buy. 


Compuworld, Inc. announces the release of two business COMPUWORLD ANNOUNCES 
packages for use on the Compucolor. They are Accounts ACCOUNTS RECEIVABLE 
Receivable and Mailing List. Accounts Receivable will support & MAILING LABEL 
100 accounts and 500 invoices per disk side. AR will provide PACKAGES 
Statements for all accounts with open invoices; invoice aging 
and account status; total monies owed for all accounts; and 
mailing labels by two parameters. Accounts Receivable is 
available for $150. 


The Mailing List package allows entry, correction, and 
deletion capabilities. You can print your labels according to 


a ar variety of parameters. The Mailing List is available 
for $75. 


Both packages run on a 32K Compucolor and do not require 
special keyboards, lower case or add-on drives. To order in 
New York State, add 7% Sales Tax. Dealer inquiries welcome. 
For further information contact: 


Compuworld, Inc. 

125 White Spruce Boulevard 
Rochester, N.Y. 14623 
(716) 473-5790 
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MICRO DATA BASE SYSTEMS Jerry Kidd from Micro Data Base Systems, Inc. has written 
RELEASES SOFTWARE FOR saying: 


THE COMPUCOLOR 


NO CHEATERS! 


John Johnson 
561 W. Enid Avenue 
Mesa, Arizona 85202 


Tom Coughlin 

c/o Elliott, Powell, 
Baden & Baker, Inc. 
1521 S.W. Salmon Street 
Portland, Oregon 97205 
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"Available now for the Compucolor 16K+ is F.R. Ruckdeschel's 
Instrument Flight Training Program, Tax Program (1040A only), 
Dictionary Listing with String Search Programs (a particularly 
useful tool for those who write educational programs), IQ 
Builder Kit, Basic Grammar Kit, Basic Algebra Kit (the kits are 
continually being expanded), Word Scramble Drills and some 
interesting new games; Golf (play some of the best courses in 
America), Space Pilot (fly assorted spacecraft in combat), 
Stockmarket, Super Hammurabi, and other programs." 


A free brochure is available from: 
Micro Data Base Systems, Inc. 


P.O. Box 248 
Lafayette, Indiana 47902 


input 


After playing "Acey Ducey" on the Chess diskette for 
awhile and being a naturally curious person, I tried inputting 
a seemingly illegal value for a bet with some interesting 
results. It appears that the program will accept a negative 
bet and if the bet loses, the negative value is subtracted from 
your score, in effect, adding to your total. If you are like 
me, when I get frustrated after losing a lot and I know of a 
way to "fudge" a bit, I will use it. To resist this 


temptation, I modified the program by adding the following 
lines: 


666 IF M=0 THEN 670 

667 PLOT 3,0,30,11,3,0,30:PRINT "HA,HA! YOU CAN'T DO THAT 
ANYMORE." 

668 FOR I=l1 TO 1000:NEXT:PLOT 3,0,30,11:GOTO 650 


This will not allow values less than 0 and will remind you 
that "cheaters never prosper", well not anymore anyway! 


Tom Coughlin is working in the life insurance business and is 
specifically interested in locating general business software 
and software developed for use in the insurance business. 
Please contact him if you have any information. 


Instructions for the complete use of the COP command for CCII, 


V6.78 software. The Copy Command does not allow the user to 
copy from the default drive to the other drive. This situation 


is true regardless of which drive is the default drive. 


When drive 0 is the default drive, files can be copied 
from drive 1 to drive 0. To copy files from drive 0 to drive 


1, do the following: 


ESC D (Enter FCS) 

FCS> DEV 1: 

DEFAULT DEVICE= CD1: 

FCS> COP 0:filename.type(;version) TO 1: 


Use the same process when the default drive is drive l. 


(If the destination device is not stated, then the destination 
device is the default device.) 


This method is quite simple and eliminates the need for 


using external programs such as COPY on the Sampler disk. 


Also programs can be loaded from drive 1 when drive 0 is 


the default drive (this pertains to programs written in BASIC). 
Simply type: 


LOAD "1:filename" or 
LOAD "0:filename" 


The same holds true for the SAVE command. 


This article adds more information to the ATTN/BREAK 
article in the February COLORCUE, which told how to avoid 
printing extraneous lower-case "y"s when using a printer with a 
hardware handshaking modification installed on the Compucolor 
II by using OUT 8,4 to disable the keyboard. Here are some 
additional hints: 


1. Despite the previous article, it IS possible to enable the 


keyboard to accept an ATTN/BREAK occasionally without affecting 
printed output. 


You now get to use the BASIC command you haven't used yet, 
I'll bet. Before you enable the keyboard, you must wait for 
the printer handshake line to quiesce. You can do this by 
issuing in BASIC: 


WAIT 1,128,128:OUT 8,255 


Of course you must issue OUT 8,4 before sending any more data 
to the printer. 


THE COPY COMMAND 


Richard Manazir 
13 Grandview St. 
Southwick, Mass 01077 


EDITOR'S NOTE 


FURTHER HINTS ON 
PRINTER PROBLEMS 


Edgar W. Swank 


5515 Spinnaker Drive, #4 
San Jose, California 95123 
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COMMUNT TY 
ACCESS 
BULLETIN 
BOARDS 


Sent By 
Don Miller 
112 Marble Dr. 


Rochester, N.Y. 14615 
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(716) 663-1175 


2. OUT 8,4 will NOT WORK if you issue any BASIC FILE commands 
FILE, GET, PUT, or LOAD/SAVE) while the printer is active. 
That is because these commands, for some reason, override your 
OUT 8,4 and re-enable the keyboard. Fortunately, you can 
overcome this problem by issuing WAIT 1,128,128 BEFORE any file 
commands, and OUT 8,4 again before sending any more printer 
data. 


3. Be sure to press CPU RESET before entering ESC G when you 
want to use DIR to print a directory. This ensures that 
keyboard input is directed to the screen, while FCS output goes 
to the printer. The "“y"s from the handshake line will then 
appear on the screen, rather than on the printer. If you fail 
to press RESET, sometimes ESC G will cause both keyboard input 
and FCS output to be sent to the printer. NOTE: After RESET 
you may have to reset the BAUD RATE unless your printer can be 
set to 9600. 


4. When you want to LIST a BASIC program, try the following 
procedure, which avoids the necessity of holding down two keys 
while the printer is active: 


a. RESET the machine and LOAD the program to be listed. 
Set Baud Rate, if necessary. 


b. Enter POKE 33289,<the line length of your printer> 
c. Enter the following on ONE line: 


PLOT 27,13:OUT 8,4:LIST:WAIT 1,128,128:PLOT 10,12:WAIT 


The PLOT 10,12 and the extra WAIT seem to be necessary to ensure 
that the last line is printed. 


attn /break : 


COMPLIMENTS OF PEOPLES' MESSAGE SYSTEM, SANTEE CA. 
LAST UPDATED 03/07/80 
*24 MEANS 24-HOUR SERVICE 


ABBS A.C.E.S., FT. LAUDERDALE FLA. .ccccccccccee (305) 
ABBS AGS, AUGUSTA GEORGIA, cccccccccccccccccccee (404) 
ABBS AKRON DIGITAL GROUP, AKRON OHIO *24....... (216) 
GEES ‘AMRAD IEA VAR ee eae E oes vvececcestT03) 
ABBS APPLE CRATE I, VANCOUVER WASHINGTON. ..+«+.. (206) 
@BBS APPLE CRATE II, VANCOUVER WASHINTON....... (206) 
ABBS APPLE-MED, IOWA CITY IOWA. .cccccccccccccee (319) 
ABBS APPLE BIN, TACOMA WASHINTON...ccccccccccee (206) 
A@BS BAILEYS COMPUTER STORE, AUGUSTA GEORGIA... (404) 
@BBS BOSTON, BOSTON MASSACHUSETTS. ..ceceesceeee (617) 
@BBS CCNJ, POMPTON PLANS NEW JERSEY...-ccceceee (201) 
A@BS CHICAGO, CHICAGO ILLINOIS....cccccccccccee (312) 
@BBC COMPUTERLAND, ARLINGTON HEIGHTS ILLINOIS.. (312) 
ABBS COMPUTER CENTER, BIRMINGHAM ALABAMA.......(205) 
ABBS COMPUTER FORUM, SANTE FE SPRINGS....ceeeee (714) 


566 0805 
733 3461 
745 7855 
893 9474 
524 0203 
244 5438 
353 6528 
937 0444 
790 8614 
354 4682 
835 7228 
622 9609 
255 6489 
945 1489 
739 0711 


@BBS 


COMPUTER LAB, MEMPHIS TENNESSEE.......eeee (901) 
COMPUTER MERCHANT, SAN DIEGO CA. .cccccccee (714) 
COMPUTER STORE, SANTA MONICA CA. ..cccceecee (213) 
COMPUTER STORE, CINCINNATI OHIO...ccccccee (513) 
COMPUTER WORLD, IRVINE CA *24...cceeeeeee(714) 
COMPUTER WORLD, WESTMINISTER CA. .cccccccee (714) 
CYBERIAN SYSTEMS, ATLANTA GEORGIA......... (404) 
BUSES. 1006 RU ee ee ewe el dls) 
DESERT TECHNOLOGY, PHOENIX ARIZ *24.......(602) 
DETROIT, DETROIT MICHIGAN... ccccccccccceee (313) 
DOWNERS GROVE, DOWNERS GROVE ILLINOIS.....(312) 
DUBUQUE, DUBUQUE IOWA. .ccccccccccccccccces (319) 
FORT WALTON BEACH, DESTIN FLA...cccecccces (904) 
FRONTIER COMPUTING, LOGAN UTAH. .ccccccecee (S01) 
GLTC.DV1, HOLLYWOOD FIA. ..cccccccccccccece (305) 
HAWTHORNE, HAWTHORNE CA *24...ccccccccecees (213) 
HOUSTON, HOUSTON TEXAS. .ccccccccccccccccce(J13) 
ar MEL Chine om tomee man ee sane en eeaiens & CTD 
LLINI MICROCOMPUTER, NAPERVILLE, ILL......(312) 
A COMPUTER STORE, DALLAS TEXAS....cececceee (214) 
ORSMEYER ELECT., HUNTINGTON BEACH CA *24..(714) 
HOUISVILLE, LOUISVILLE KENTUCKY. .ccecccces (502) 
MC COMPUTER STORE, SANTA MONICA CA,.......-(213) 
MEAT ,. BEML. Delis ca kiebicsbaie on00cceneeet soe GUO) 
MICHIGAN APPLE CLUB, DETROIT MICHIGAN.....(313) 
IINNEAPOLIS, MINNEAPOLIS MINNESOTA *24.... (612) 
NJAUC, MARLTON NEW JERSEY.....ccccccecccee (609) 
OKS, OKLAHOMA CITY OKLAHOMA. .cccccccccceee (405) 
ORIGINAL APPLECORPS, LOS ANGELES CA *24...(213) 
PALM BEACH, WEST PALM BEACH FLA. ...cecceccee (305) 


PALO ALTO, PALO ALTO CA. ccccccccccvcccccce (415) 


PASADENA, PASADENA CA *24..ccccccccccccces (213) 
eee oe EO CO wave caccccacceneceess (415) 
PERIPHERALS UNLTD. INC., SIGNAL HILL CA... (213) 
PERSONAL COMP. OD CHICAGO, CHICAGO ILL....(312) 
PHOENIX, PHOENIX ARIZONA... ccccccccccccces (002) 
PROGRAMMA INTL., BRENTWOOD CA *24........+(213) 
RAINBOW COMPUTING, LOS ANGELES CA......... (213) 
JAN ANTONIO, SAN ANTONIO TEXAS *24........(512) 
SAN FRANCISCO, SAN FRANCISCO CA...ceeeeeee (415) 
SANTA MONICA, SANTA MONICA CA. ..ccccceeeee (213) 
STATEN ISLAND, NEW YORK NEW YORK *24......(212) 
TORRANCE, : TORRANCE CA. .cdicccccseeeeddeacetala 
27-MICRO, LOS ANGELES CA. .cccccccccccccees (213) 


ABBS VAN NUYS, VAN NUYS CAcicwscessoceds tubes 
ABBS WEST WASHINGTON, ELMA WASHINGTON. ...eeeeee (206) 


@BBS 


WYCKOFF, WYCKOFF NEW JERSEY. .cccccccccccee(2Ul) 


ABBS YOUNGS ELECT SVC., COLLEGE STATION TEXAS.. (713) 
AVIONICS 80, KANSAS CITY MISSOURI. ..cccccccccee (913) 
BILLBOARD 80, SAN JOSE SS ene ye Ere 


CBBS 
CBBS 
CBBS 
CBBS 
BBBS 
CBBS 
CBBC 


ATLANTA, ATLANTA, GEORGIA *24.....ecceceee (404) 
BOSTON, BOSTON MASSACHUSETTS *24....ccceeee (617) 
CAMBRIDGE, CAMBRIDGE, MASSACHUSETTS *24...(617) 
CHICAGO, CHICAGO ILLINOIS *24.....ccceceee (312) 
COLUMBUS, COLUMBUS OHIO *24........cecee0-(614) 
DETROIT, DETROIT MICHIGAN *24.....ceceeces (313) 
L.I. COMP ASSOC, LONG ISLAND NEW YORK.....(516) 


761 
582 
394 
874 
751 
898 
339 
826 
957 
477 
964 
557 
243 
753 
989 
675 
977 
772 
420 
634 
962 
245 
828 
821 
569 
929 
983 
528 
340 
689 
493 
799 
948 
424 
337 
886 
395 
349 
657 
661 
396 
448 
316 
276 
787 
482 
891 
693 
782 
263 
394 
963 
864 
528 
272 
288 
938 


4743 
9557 
1505 
2283 
1422 
1984 
5429 
0325 
4428 
4471 
7768 
9618 
1257 
6800 
9647 
8803 
7019 
8868 
7995 
2668 
7979 
8288 
3400 
7401 
2063 
8966 
5970 
8009 
0135 
3234 
7691 
1632 
1474 
3506 
6631 
0258 
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5728 
0779 
0705 
3905 
6576 
5706 
4276 
4004 
5134 
7441 
8080 
5115 
0248 
4220 
8310 
3819 
7141 
2759 
0335 
9043 


23 


24 


BB NASHVILLE, NASHVILLE TENNESSEE *24........ (615) 
CBBS NEW YORK, ENDICOTT NEW YORK *24.......0e++(607) 
CBBS NW, PORTLAND OREGON *24..cccccccccccccccee (503) 
Bes SAM Liles, Ae DLP Cs cc owe spnarecocnsact tis) 
CBB SAN FERNANDO, LOS ANGELES CA. .cccccccccceee (213) 
BBBS SANTA CLARA, SANTA CLARA CA...ccccccccecee (408) 
CBBS TERRY FOX, WASHINGTON D.C. *24...cccccceee (703) 
@BBS VANCOUVER, VANCOUVER BRITISH COLUMBIA *24. (604) 
CBBS WASHINGTON, WASHINGTON D.C. *24...cccececee (703) 
MMS CHICAGO, CHICAGO ILLIONIS.....ccccccccccce (312) 
COMM-80 ORANGE COUNTY, FULLERTON CA...cceccecee (714) 
COMPUSYSTEMS, COLUMBIA SOUTH CAROLINA. .........(803) 
ENGINEER-80, OLATHE KANSAS..cccccccccccccccceee (913) 
FAMILY HISTORIANS FORUM 80, FAIRFAX VA *24.....(703) 
FORUM-80 AUGUSTA, AUGUSTA GEORGIA. ..cccccccccee (803) 
FORUM-80 DALLAS, DALLAS TEXAS. ...cccccccccccccee (214) 
FORUM-80 DUNSTABLE, DUNSTABLE MASS. *24....++.. (617) 
FORUM-80 FT. LAUDERDALE, FT. LAUDERDALE FLA....(305) 
FORUM-80 FT. WORTH, FT. WORTH TEXAS *24........-(817) 
FORUM-80 KANSAS CITY, KANSAS CITY MISSOURI -*24. (816) 
FORUM-80 LAS VEGAS, LAS VEGAS NEVADA....-.ceeeee (702) 
FORUM-80 LOS ANGELES, LOS ANGELES CA......eeee0e(213) 
FORUM-80 MEMPHIS, MEMPHIS TENNESSEE *24.......-(901) 
FORUM-80 SAN FRANCISCO, SAN FRANCISCO CA *24...(415) 
FORUM-80 ST. LOUIS, ST. LOUIS MISSOURI......e-. (314) 
FORUM-80 TAMPA, TAMPA FLA... cccccccccccccccccee (S13) 
FORUM-80 VENTURA COUNTY, CAMARILLO CA *24......(805) 
FORUM-80 WASHINGTON D.C., WASHINGTON D.C.......(202) 
FORUM-80 WELLESLEY, BOSTON MASSACUHSSETTS...... (617) 
FORUM-80 WICHITA, WICHITA KANSAS. ....ececceceee (316) 
FORUM-80 WICHITA FALLS, WICHITA FALLS TEXAS....(817) 
MARKET 80, KANSAS CITY MISSOURI. ..cccccccceceee (S16) 
MEDICAL FORUM-80, MI. CLEMENS MICHIGAN. ...+.eee. (313) 
NEW ENGLAND COMP. SOC., MAYNARD MASS......e+e++ (617) 
PEOPLES' MESSAGE SYSTEM, SANTEE CA *24.....ee0+(714) 
PET BULLETIN BOARD, YPSILANTI MICHIGAN *24.....(313) 
POTOMAC MICRO MAGIC INC., FALLS CHURCH VA......(703) 
REMOTE NORTHSTAR, ATLANTA GEORGIA *24........2-(404) 
REMOTE CP/M MINICBBS, ROYAL OAK MICHIGAN *24... (313) 


254 
754 
646 
571 
843 
241 
734 
687 
281 
767 
526 
771 
764 
978 
279 
288 
649 
772 
923 
861 
873 
566 
276 
348 
838 
223 
484 
337 
431 
746 
855 
931 
465 
897 
449 
484 
750 
Be 
588 


9193 
5571 
5510 
5550 
5390 
1956 
1387 
2640 
2125 
0202 
3687 
0922 
1520 
7561 
5392 
4859 
7097 
4444 
0009 
7040 
9491 
8035 
8196 
2139 
7784 
7688 
9904 
4694 
1699 
2078 
3916 
3135 
yoo 
0346 
5689 
0732 
0930 
1520 
7054 


SPECIAL INVENTORY SURPLUS SALE 


We had such a good response to our inventory sale in last month's issue of 
COLORCUE that we decided to offer these parts as well. These bargain prices 
can't be beat. You can take advantage of this sale by just filling in the 
quantity and making out a check or money order to Compucolor for the total 
amount. In Georgia, please add 4% sales tax. 


ITEM COST PER ITEM QUANTITY 
(#300010) .02 UF 1600V 05 
1N4731 .10 
2N5771 PNP .10 
(#110097) IC HEAT SINK .10 
(#300055) 2,500 UF 15V 1.00 
3.3 ohm 2W .05 ae 
150 ohm 1/4W .03 
4.3K 1/4W .03 
NUTS PIX TUBE MOUNT 10/.10 puta 
SPACE BAR TABS .10 
LOGO CLIPS .03 
FOCUS RESISTOR 235 
TUBE SOCKET CLIPS 07 
(#900033) YOKE CLAMP SCREW 10/.10 
4-40 X 7/8 X 7/8 BRASS HEX SPACER 10 
(#200022) 680 ohm 1/4W RESISTOR .03 
220 UF 16V 015 
(#120067) 8-32 X 3/8 FLAT HEAD 10/.10 
.068 UF 250V .10 
007-9817178 CONNECTOR 1.10 
(#200043) 39K 1/4W .03 
(#600083) 6 PIN CONNECTOR .10 
4 PIN CONNECTOR .10 
10 UHY CHOKE .10 
(#600013) 3 PIN TRANSISTOR SOCKET 15 
(#500120) CRT CHIP 5027-000 UF9 2.00 
C1702A 2.00 
(#120049) POST NUT .02 
(#120032) 10-32 X 1/2 FLAT HD SCREW ° 10/.10 
(#120041) 8-32 HEX NUT .05 
(#110010) FUSE CLIP 02 
(#120022) 4-40 X 3/4 TRUSS HD 10/.10 
4-40 X 3/4 PAN HD 10/.10 
8 X 3/4 HEX HEAD 10/.10 
(#110048) SPRING FUSE CLIP 2/.10 
(#500055) 81LS96 1.00 
ANSLEY 609-255 1.00 
(#120075) 6 X 3/16 SPACER 2/.10 
(#120059) 6-32 X 7/8 SCREW 10/.10 
(#120066) #10 WASHER FLAT 10/.10 
(#120062) 4-40 X 1/8 ROUND HEAD SCREW 10/.10 
(#200207) 1K 2W RESISTOR .05 
EXPERIMENTAL CASE 5.00 
BELL FOR COMPUCOLOR 14.95 


MYSTERY PACKAGE (nuts, bolts, screws, 
transistors, Capacitors, ICs, 


diodes, etc.) 5.99 
SURPLUS 8000 INTECOLOR COMPUTERS 
(without cards) $200 -— $600 
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We still have a good quantity of the items listed on last month's inventory 
list. 
COST PER ITEM QUANTITY 
Assorted key caps and space bars 
(list the keys you need to 
the left of the quantity column.) $ .10 


Compucolor disk drive face plates $ .50 
1K 2W 10% resistors $ .05 
38,000 MFD 15 VDC capacitors $3.66 
610 MFD 15 VDC capacitors $1.99 
1100 MFD 100 WDC capacitors $1.48 
8700 MFD 40 VDC capacitors $1.46 
3500 MFD 30 VDC capacitors $1.46 
1702 EPROMS $2.00 


Of special interest -- motor speed 

controls and video blanking circuits 

(either separate or combined on 

one board). The motor speed control 

Circuit locks disk speed at 300 rpm. 

Brand new, no warranty. Will not 

work with the formatter. Motor Speed 
Control without video blanking only $30.00 
with video blanking $35.00 


375 RCA 8-track stereo 

recorder/players (without case) 

for sale. Look into this for mass 

storage, nothing beats it for the 

price. A really great buy at only $5.00 each! 


ADI Keyboards -- we will refund 
purchase price to the lst person who 
interfaces this to the CCII! It 

can be done! The ADI has a detachable 
keyboard which presents the standard 
ASCII 4-level code. The keyboard 

keys are opticaly encoded by means of 
photo transistors, a light source, and 
shutters attached to the keys. There 
are no Switches to wear out and the 
unit is RFI free. The keyboard does 
not provide 2-key rollover. $25.00 


These parts may be slightly used or be brand new surplus inventory -- they 
are guaranteed to work, and all parts are priced very low! 


YOUR NAME: 


ADDRESS: 


MAIL TO: 


Compucolor Corporation 
225 Technology Park/Atlanta 

26 Norcross, Georgia 30092 
Attn: Reclamation Department 


Effective 6/1/80 TERMS: CASH WITH ORDER 


HOW TO SUBSCRIBE AND ORDER BACK ISSUES 


New owners are entitled to a six month's free subscription to 
COLORCUE as soon as their warranty card has been returned. Following the 
first six month's free subscription, the subscription rate is $12 per year 
in the U.S., Canada, and Mexico and $24 throughout the rest of the world. 


Each quarter, back issues are combined into one issue covering that 
period. Quarterly issues may be ordered for $5 each. Once the quarterly 
issue is ready, individual issues will not be sold separately. During the 
current quarter, individual issues are available for $2 each. 


Below is a list of all back issues of COLORCUE. To order, fill out 
the attached order blank, enclose your check or money order (no cash, 
please), and mail your order to: 

Cathy Abramson 
COLORCUE 
100 Northcreek, Suite #250 


3715 Northside Parkway, N.W. 
Atlanta, Georgia 30327 


KKKKKKKKKEKEKRKEEEREEKEREEREKEREEERKE KERR ERERERERERREEEREREEEEERER 


Please send me the issues I have checked below: 


eeu Volume 1, Nos. 1, 2, 3 October-December 1978 
a Volume 2, Nos. 1, 2, 3 January-March 1979 
—_- Volume 2, Nos. 4, 5 April-May/June 1979 

-— Volume 2, Nos. 6, 7, 8 August-November 1979 
ee Volume 3, Nos. 1, 2, 3 Dec./Jan. - March 1980 
~—— Volume 3, No. 4 April 1980 


Please enter my subscription for __ year(s) beginning ° 


I have enclosed my check or money order in the amount of $__... Thank you. 


CITY: STATE: ZIP: 
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@® = 
Compucolor Corporation 
Intecolor Drive 
225 Technology Park/Atlanta 
Norcross, Georgia 30092 
Telephone 404/449-5996 


